Infelizmente, não temos o nome do promotor do MP que atua no caso.
Comarca de origem
Média anual de processos por comarca de origem
Código
aux_contagens_comarca <- aux_comarca |> dplyr::mutate(ano = lubridate::year(decisoes_data)) |> dplyr::filter(ano %in%2019:2022) |> dplyr::count(comarca) |> dplyr::filter(!is.na(comarca)) |># dividimos por 4 para dar a média por ano dplyr::mutate(n = n /4)contagens_sf <- comarca_sf |> dplyr::left_join(aux_contagens_comarca, "comarca") |> dplyr::mutate(ncat =cut( n, c(0, 200, 500, 1000, 100000),labels =c("Até 200", "Entre 200 e 500","Entre 500 e 1.000", "Mais de 1.000" ),include.lowest =FALSE )) |> dplyr::filter(!is.na(comarca))
The legacy packages maptools, rgdal, and rgeos, underpinning the sp package,
which was just loaded, were retired in October 2023.
Please refer to R-spatial evolution reports for details, especially
https://r-spatial.org/r/2023/05/15/evolution4.html.
It may be desirable to make the sf package available;
package maintainers should consider adding sf to Suggests:.